inherited fFiltra_Aluguel_Rec: TfFiltra_Aluguel_Rec
  Left = -4
  Top = -4
  Width = 808
  Height = 577
  Caption = 'Pesquisa Aluguel a Receber'
  Color = 11189162
  OldCreateOrder = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 5
    Top = 8
    Width = 20
    Height = 13
    Caption = 'M'#234's'
  end
  object Label2: TLabel [1]
    Left = 328
    Top = 8
    Width = 28
    Height = 13
    Caption = 'Nome'
  end
  object Label4: TLabel [2]
    Left = 373
    Top = 49
    Width = 37
    Height = 13
    Caption = 'Numero'
  end
  object Label3: TLabel [3]
    Left = 5
    Top = 49
    Width = 20
    Height = 13
    Caption = 'Rua'
  end
  object Label7: TLabel [4]
    Left = 101
    Top = 8
    Width = 54
    Height = 13
    Caption = 'Periodo de '
  end
  object Label8: TLabel [5]
    Left = 195
    Top = 8
    Width = 15
    Height = 13
    Caption = 'at'#233
  end
  inherited Panel1: TPanel
    Top = 500
    Width = 800
  end
  object cbStatus: TComboBox [7]
    Left = 5
    Top = 22
    Width = 92
    Height = 24
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 16
    ParentFont = False
    PopupMenu = PopupMenu1
    TabOrder = 1
    OnClick = cbStatusExit
    OnExit = cbStatusExit
    OnKeyPress = FormKeyPress
    Items.Strings = (
      'Janeiro'
      'Fevereiro'
      'Mar'#231'o'
      'Abril'
      'Maio'
      'Junho'
      'Julho'
      'Agosto'
      'Setembro'
      'Outubro'
      'Novembro'
      'Dezembro')
  end
  object edCodCliente: TEdit [8]
    Left = 327
    Top = 22
    Width = 399
    Height = 24
    TabStop = False
    Color = clInfoBk
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = PopupMenu1
    ReadOnly = True
    TabOrder = 2
  end
  object BitBtn8: TBitBtn [9]
    Left = 327
    Top = 59
    Width = 45
    Height = 29
    Caption = 'F3'
    PopupMenu = PopupMenu1
    TabOrder = 3
    OnClick = BitBtn8Click
    Glyph.Data = {
      5E060000424D5E06000000000000360400002800000017000000170000000100
      0800000000002802000000000000000000000001000000000000FFFFFF002929
      2900C0C0C00039393900424242004A4A4A00525252005A5A5A00636363006B6B
      6B00737373007B7B7B00848484008C8C8C00949494009C9C9C00A5A5A500ADAD
      AD00B5B5B500BDBDBD00C6C6C600CECECE00D6D6D600DEDEDE00EFEFEF00F7F7
      F700B5B5BD00E7E7F700C6C6DE00CECEE700C6C6E7009C9CF7009C9CFF005252
      D6001818D6000000B50010218400ADBDE70000298C0010A5CE0029CEE700F7FF
      FF00CED6D600A5ADAD00BDC6C600BDCECE00525A5A004A525200E7FFFF009CAD
      AD0094A5A500CEE7E700ADC6C60039424200D6F7F7009CB5B500ADCECE002129
      290094BDBD00A5DEDE00739C9C009CD6D6007BADAD00638C8C0073A5A5009CE7
      E70010181800A5FFFF005A8C8C0084CECE008CDEDE009CF7F70094EFEF009CFF
      FF004A7B7B007BCECE0094FFFF0063B5B5008CFFFF0073D6D6005AADAD006BCE
      CE0084FFFF00081010005AB5B50073E7E700183131007BFFFF00295A5A0073FF
      FF006BEFEF0063E7E7006BFFFF005ADEDE0042A5A50063F7F70052CECE0063FF
      FF005AEFEF00215A5A005AF7F7005AFFFF0039A5A5003194940052F7F7001031
      31004AF7F70018525200217B7B0042F7F7000821210031DEDE000829290029EF
      EF000831310021DEDE0018CECE0010D6D6000894940000080800001010000018
      1800002121000029290000313100003939000042420000525200005A5A000063
      6300006B6B0000737300007B7B0000848400008C8C0000949400009C9C0000A5
      A50000B5B50000BDBD00FFFFF700B5B5AD00C6C6BD0094948C0084847B006B6B
      6300FFFFE7006B635A00F7EFEF00FFF7F700BDB5B500C6BDBD00948C8C009C94
      94007B737300FFEFEF00736B6B00847B7B006B636300BDADAD005A525200635A
      5A00524A4A00FFE7E7004A424200D6BDBD00CEB5B50084737300C6ADAD003931
      3100A58C8C00D6B5B500FFD6D6006352520029212100FFCECE004A393900EFB5
      B500FFBDBD00FFB5B500FFADAD0018101000FFA5A500FF9C9C00FF949400FF8C
      8C00FF848400FF7B7B00FF737300FF6B6B00FF636300FF525200FF4A4A00FF39
      3900FF000000947BB50000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000A6A6A6A6A6A6
      A6A6A6A6A6A6A6A635AE0FA6A6A6A6A6A600153D153D153D153D153DA63F087C
      817CA90F153D153D1500A6A6A6A6A6A6A6A6A69035A97F8884797FA90FA6A6A6
      A600153D153D153D153FB07C8484888181C48481A90F153D1500A6A6A61515A8
      AE7F797F848181845B6784847FB537A6A600153DA60FA97984887C7C88884161
      49616F847F7C350F1500A615C379848484847908284961496141616F7F7984A9
      0F001515907C88816C8851514161496149614951087C8881A900A6A6C37C848A
      5B4961006C7C4D4961153C3F8B6F84847900153D90A96F6149615BA9A908A927
      4D885161496151847900A6A615A73F614D08AE081500A6C44D61614961515B6F
      7900153D1515A77C350833000036003DA94D496161260F613F00A615A608A990
      1500A30000000000377C4D495B3C370FA6001508A908923692BEB7A692000036
      00A6A951670FA637150035081D00A3BEBEBABABEB3C0A3001D2037B50815A6A6
      A6000F150000BABEBABABABEBAB392003723250FAD0F153D150015373700A3BA
      BABEBAAFA30000001D4D37373F9015A6A600153D371500AFBAAF003600000000
      000F0F37153D153D1500A6A6A60FA600000000B3B300A3A63FA6A6A6A6A6A6A6
      A600153D153D373D00BABABEBA370F0F153D153D153D153D1500A6A6A6A6150F
      A6BEAAA6370FA6A6A6A6A6A6A6A6A6A6A6001537153D153DA6373737A615153D
      153D1537153D153D1500A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6
      A600}
  end
  object Edit2: TEdit [10]
    Left = 5
    Top = 62
    Width = 321
    Height = 24
    TabStop = False
    Color = clInfoBk
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = PopupMenu1
    ReadOnly = True
    TabOrder = 5
  end
  object DBGrid1: TDBGrid [11]
    Left = 6
    Top = 94
    Width = 769
    Height = 395
    DataSource = DataSource2
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    PopupMenu = PopupMenu1
    TabOrder = 7
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDrawColumnCell = DBGrid1DrawColumnCell
    OnTitleClick = DBGrid1TitleClick
    Columns = <
      item
        Expanded = False
        FieldName = 'PARCELA'
        Title.Caption = 'Parcela'
        Width = 40
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'VENCIMENTO'
        Title.Caption = 'Vencimento'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DATA_REC'
        Title.Caption = 'Data Receb.'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'STATUS'
        Title.Caption = 'Status'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TOTAL_ALUGUEL'
        Title.Caption = 'R$ Mensalidade'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TOTAL_DESPESAS'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Title.Caption = 'R$ Despesas'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TOTAL_RECEITAS'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Title.Caption = 'R$ Receitas'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'VALOR_A_REC'
        Title.Caption = 'R$ '#225' Receber'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TOTAL_RECEBIDO'
        Title.Caption = 'R$  Recebido'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TROCO_REC'
        Title.Caption = 'R$ Diferen'#231'a'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NOME_INQUILINO'
        Title.Caption = 'Cliente'
        Width = 375
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NOME_PROPRIETARIO'
        Title.Caption = 'Proprietario'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'RUA'
        Title.Caption = 'Endere'#231'o'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NR'
        Title.Caption = 'N'#186
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COMPL'
        Title.Caption = 'Complemento'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BAIRRO'
        Title.Caption = 'Bairro'
        Visible = True
      end>
  end
  object BitBtn1: TBitBtn [12]
    Left = 727
    Top = 15
    Width = 52
    Height = 32
    Caption = 'F2'
    PopupMenu = PopupMenu1
    TabOrder = 9
    OnClick = BitBtn1Click
    Glyph.Data = {
      86070000424D86070000000000003600000028000000180000001A0000000100
      1800000000005007000000000000000000000000000000000000FFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDEFFDEE0FFE0E0FFE0
      E0FFE0E0FFE0E0FFE0E0FFE0E0FFE0DCFFDCFDFFFDFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBFFFBDBFFDBC8
      FFC8C2F8C2C3F9C3C3F9C3C3F9C3C3F9C3C3F9C3C4FAC4CBFFCBCCFFCCCBFFCB
      EAFFEAFAFFFAFCFFFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFECFF
      ECC3FFC3D0FFD0ACDFAC94C7949CD0959DD1949ACD969DD1949DD09396CA95C4
      F7C4D2FFD2B9ECB9CFFFCFC4FFC4E7FFE7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FAFFFAD1FFD1CDFFCDD0FFD0B1E4B199CC9987BA7E4677963B6B9B6A9F7A3B6C
      9A396A9A97CA9A9BCE9AA1D4A198CB989DD09DCDFFCDD1FFD1D6FFD6FFFFFFFF
      FFFFFFFFFFF9FFF9CCFFCCC4F9C4BAEDBAB3E6B389BC8980B37F5C93671D2D39
      434874408E8741476F1E275488B985A0D39FA3D9A099CF9698CE969CD298A5D9
      A5C7FFC7DEFFDEFFFFFFF8FFF8D3FFD3ABDFABA4D7A39CCF9B70A570699E6969
      9D6631643639705A91C8CB002D00A6DCDD255C5B3D715E81B77A3043503C5A51
      37554C344852A2DB9CCAFECACFFFCFF8FFF8F7FFF7A7DFA781B4805D9062588B
      6456784F577A516085680036198FC2BC8AC1C2616467A5DDDD88BBBC03363271
      A9673A41662925615B58915F599858717198CE95CCFFCCF3FFF3F7FFF7A6E0A6
      79AC75699C8035666E4262663F5F6362939A001F0088BDB588BFC05B6061A3DA
      DA7DB0B122555070A8663B44668B8ABF4B4C7E8481BA3A5551B0E7ADC8FFC8F2
      FFF2FEFBFEDDFADC9CD1A144737659B8B9549A9A5499995DC4C5404C4A98C4C4
      88C0C05B65659FD6D6A0D3D53C6F6A6FA35D3B4562554B864C42797F77B33C5B
      54C8FCC4E3FFE3FFFFFFFFFFFFFFFBFFC3F5C937656962C2C25BA7A75CA8A85B
      C0C045545597C2C39ED3D381B8B99BCECFA3D6D83B7067618E6F321D612E0E7F
      2D27933F157D2D4683E3EAF1FFFFFFFFFFFFFFFFFFFFFFFFBDEDC0387D8169D5
      D567A3A368A8A85AB7B7433A3B94C4C895CCCF96CCCF94CACCA1D6DA3C76684C
      586D543AB02F67CD306ED4476BCF3314A4D9D5E6FFFFFFFFFFFFFFFFFFFFFFFF
      A7D8AB61B7BC66D2D266B0B0678686587E7F4A4241A49F59BCB67DB9B377BBB3
      74ACBE9E39686C5A6A9C2B4CB03369D03166CC3E6DD03C16A8D9D1E2FFFFFFFF
      FFFFFFFFFFFFFDFF639C7064D9E066D4D569A4A6649CA0477F8D6A7C46F5F3A5
      FFFFD4FFFFEEFFFFF7DFDC836059448490452A5DB63366CF3166CC3E6DCF3C17
      A8D9D1E3FFFFFFFFFFFFFFFFFFF9FAF9588A565A8B7161918A3D736D7C8C64D2
      CD7DD4D4C1FFFFCDFFFFDEFFFFFFFFFFF2FFFFD3BCB9B1ABC5992560BA3168D4
      316AD4486AD6350DA5DAD1E3FFFFFFFFFFFFFFFFFF8BAD8C4B7F4F6FA27DA5D9
      9F5F8B5166684CFFFFD9DADAC8FBFBE3FFFFF1FFFFFFFFFFFAE7E7DFF0EFEDA4
      AE992031743B519E1C32833D5457150D68E0D9EDFFFFFFFFFFFFFFFFFF698869
      ACE2AC90C38FD9FFDBDFFFCB7C9866D4D4D2FFFFFFFEFEFFFFFFFFFFFFFFFFFF
      FFFAFAFBFFFFFF9B918F43929077679F6F5B9597FFF153A3A1B1B4B5FFFFFFFF
      FFFFFFFFFF6A896AB8EDB89ACD9AC9FCC9CEFFD3BFDFA7726C5DEDEDF1FFFFFF
      F5FFFFF6FFFFF7FFFFFFFFFFE9E3E444714E4EB7AD8AAED0A4C8E971DCDBADFF
      FF54A4A3B5BCBCFFFFFFFFFFFF618261C6FCC6CDFFCDC8FBC8D3FFD1D8FFDAB8
      D7A0837B63AFAEAD42ABD743A8D59ABDB5D9CDD14F79516AD1CB76DDDDA1FFFF
      9FFFFF6BC7C76EBDBD95FFFF688383FFFFFFFFFFFFE4F8E4407840BBF0BBDBFF
      DA90BB9C91BD9DDAFFD53356881231786DDDFF69D6FF4988BA2147154AB0AC67
      D2D480E6E690FEFA8EFCF890F7F770DBD995FFFF668181FFFFFFFFFFFFFFFFFF
      DEEDDE74976F85BC7738639B39649883B49B4A539563ADE567D2FF64D2FF87B3
      E804228D97A9AD43A3A169DED8334F7439557A6CE3DFB7FFFF4E959BCFD5D4FF
      FFFFFFFFFFFFFFFFFDFAFB5455744875AC6BA0D56BA4DD484E538297B04E5EE7
      6EDBFF71E1FF3A28BC00157AFAF9FA96ABAA333C69958FC549437E000000021B
      1BDBDFDFFFFFFFFFFFFFFFFFFFFFFFFFABABB1140E4C719CD0669BCE69A3D642
      3D778F89A820399C2C60C0344AAD000064939CC2FFFFFF928FAB8583BC7777AA
      7272A9302F47000000D6D5D5FFFFFFFFFFFFFFFFFFFFFFFFBFBFBD0000125276
      AE6DA2D572A8DD00001E8B8B9DE0E0EB001988001D85325EAEFCFDFBFFFFFF60
      60607A7AA86E6B9F4C4B8205050B000000DDDDDDFFFFFFFFFFFFFFFFFFFFFFFF
      FAFAF97679874E2A4B27276239163E65657DFFFFFFFFFFFFFFFFFDFFFFFEFFFF
      FEFFFFFFFFFFFF5353643E3D5E5F7BB909101E070602727272FDFDFDFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFF9F9F7BEC1BC9393A1999C9CFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDAD9D80D0C07000310000000BCBBBBFEFE
      FEFFFFFFFFFFFFFFFFFF}
  end
  object Data1: TDateEdit [13]
    Left = 101
    Top = 22
    Width = 91
    Height = 25
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    NumGlyphs = 2
    ParentFont = False
    PopupMenu = PopupMenu1
    TabOrder = 4
    OnKeyPress = FormKeyPress
  end
  object Data2: TDateEdit [14]
    Left = 196
    Top = 22
    Width = 91
    Height = 25
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    NumGlyphs = 2
    ParentFont = False
    PopupMenu = PopupMenu1
    TabOrder = 6
    OnKeyPress = FormKeyPress
  end
  object BitBtn9: TBitBtn [15]
    Left = 288
    Top = 19
    Width = 31
    Height = 28
    PopupMenu = PopupMenu1
    TabOrder = 8
    OnClick = BitBtn9Click
    Glyph.Data = {
      F6060000424DF606000000000000360000002800000018000000180000000100
      180000000000C0060000C40E0000C40E00000000000000000000F3FFEEF9FDF9
      FCF9FEFFF9FFFFFAFFFFFEFFFEFEFFFAFAFFF9FAFFFBFEF7FFFEFBFFFCFFFFFE
      FDFFFEF8FAFDF7FCFCFFFBFCFFFDFCFDFFFDFEFFFDFFFFFCFFFFFAFFFBFEFFF3
      FEFAFCFFF6FAFEFAFEFEFFFFFBFFFFFFFBFDFFF2F9FDFCFCFEFFFCFEFFFEFEFE
      FFFCFBFFFCFDFFFEFFFDFBFCFFFDFEFDFEFEFCFCFCFBFBFAFFFCFCFFFEFDFFFF
      FFFFFEFFFAFDFCFAFEF9FCF9F6FFFFFFFDFEFFFBFCFFC4C7D46B7178858591D5
      D8D9FFFFFEFAF9FBFFFFFFFEFDFDFDFAFFFCF8FFFFFEFFFEFDFAFEFFFDF6F9FA
      FFFFFFF8F9FFBFBDD1A9AAAFFEFEFBFFFFF9FFFAFFFFF9FFFDF7FFC8B7E81800
      922C07AD3421769994B0FDFEFAFFFFFFFBFCFEFAFAFFFDFCFFFEFEFAFDFEF2FE
      FCFFFDFDFFFFFFFFC2C2EC5B47B0210486908BA7FCFCF8FFFFF9FFFDFDFFFCFB
      FFFFFFBFB4EC2908B22F00D43212A55A4E8ECFD5D2FFFFFFF9F9F9FCFCFEFEFB
      FFFAFBF9FFFFF6FEFDFFFCF9FFB5ADE93D27A1260D93503AACF3F1FFFFFFFEFF
      FEF8FFFEFAFFFFF5FCFFFBEAECFF6952CF2400C33204C8321F8D787B8FF9FEF4
      FFFFFFFEFDFFFEFAFFFFFFFDF9FBF9FFFFFFA296E03A1FA01E00A57560D4E3E1
      FEFFFFFFFDFCFEFFFFF9FEFBFFFEFDFDFDFFFDF6FDFFFBFBFF7565CB2400BE30
      0ABF2712869499A8F4F6F4FFFEFFFFFEFFFFFFFCFFFFFF8168DB2400A52A08AD
      A39ADEFDFFFFFBFFFEFBFEFEFDFEFEFAFBFBFCFAFFFEFEFEFFFFFFFBFBFEFBFC
      FFF7F3FF4D34C32802B4300EB93D3674ADAEBDFDFDFAFFFFFFFFF7FF9987DC25
      01A53214AC9585E1FFFFFFF9FFF9FCFFFAFDFDFDF9FBFBFAFDFFFCFEFFFCFEFC
      FCFBFAFFFCFFFBFBFFFEFFFFDAD4FF4F34C62600B73821994B4577BDC3C4FFFF
      FF9B86DF370CAF2A06AD9687E4F4F9FFFDFFF6FDFEF8FFFEFFFCFAFAFCFFFFF5
      FDFFFCFDFFFEFFFFFEFEF9FEFDFBFFFFFBFDFFFDFEFFFFF0E4FF6349C72500B2
      30169D3C33877257D62700A23107AEB1A4E2FFFFFFFBFEFFFFFBFFFFFEFFFFFD
      FDFFFFF6FAFEF7FAFEFCFFFFFCFEFCFCFFFEFFFDFCFAFFFEFBFEFEFCFEFEFFFF
      FEFFEDE1FF664CCD2C11AC260DB22604B7341BA69487DCFFFFFFFFFEFFFFFDFB
      FDF8FEFFFBFFFEFBFFFBFDF5FBFEF6FEFEFCFFFFF7FFFCFCFDF8FFFFFFFFFFFE
      FEFFFCFFFFFDFEFFFFFDFFFFFFE7DFFF4B30D52200DB2901D433259699A2B2FF
      FFFFFFFFFFFFFEFAFFFFFDFCF6FDFEF9FFFCFDFDFDFEFCFDFCFEFDFEF3FFFCFD
      FFF9FFFFFFF7FFFFFAFEFBFFFEFEFDFDFFFDFEFEFF7E66DF2201B52902D32C00
      DF2F11AE352E74909597EDECEEFFFEFFFEFAF3FEFDF9FFFAFFFDFCFFF9FBFFFA
      FCFFFAFDF8FEFEFEFFFAFFFFFBFCFFFBFBFFFCFEFDFFFDF8F5FF9889E02300A8
      2F12A67D6ED7967EEC3314AB3A1AA3463880807C9EDBDAE6FFFFFFFDFCFBFCFE
      FCFDFDF9FBFCFAFCFDFEFBFEFFFBFCFEFFFDFFFFF9FFFFFDFEFEFFFFFFFFFF93
      86DD2D0CAA2D04B17664C8F1F5FFFFFFFFC1ADFA3710AD310F9E423187616284
      CDD2E0FFFFFFFDFFFCFEFFEFFFFFF4FFFFFBF6FCFCFBFCFFFFF9FFFFFDFEFEFE
      FDFFFFFF7C67DF2000AC2603B57566C2FBF1FFFFFCFFFBFDFFFEFFFFFDFAFF52
      34B82E08B22F14A1464A7998A2B1ECF4F7FAFFF3FFFFF6FFFEFAF9FDFEF7FBFA
      FEFEFAFDFFFBF1EDFF9483E02400AF2507B05240BEEFEDFFFFFBFFFEF7FCFEFD
      FCFAFEFAFDFFFFEBE0FF8169DB2A0DA235209841397FB0B3C7FFFFFFFEFBFDFF
      FCFFFBFDFEFAFEF5FDFFF9F1F6FC7D6DC82C0AAF2D04BF432EB3C4C1F3FFFFFF
      FEFFFCFEFDFDFEFDFEFBFCFDFAFFFFF8FEFFF3EEFFB19CF71B00974E389ED2D0
      ECFFFCFFFFFAFFFFF7FFFFFEF9FCFFFBFFFFFF846BE32300BA2D00D13D24AABC
      B3EFFFFFFFFDFFFAFFFFF6FFFFF8FFFFFFFFFFFBFEFFF5FCFFFBFEFEFFFFFFFF
      F5EBFFE6E2F8FEFFFFFDFFFFFDFDFFFEFEFEFFFEFDFCFBFCFFFFFF1B00A32E03
      CB2000ADA69BE3FEF9FFFDF9FFFFFFFDFEFEFBFCFEFDFEFBFFFEFEFDFFFFFAFF
      FEFDFFFFFEFFFFFCFFFCFFFEFCFDFFFFFAFCFEFCFCFFFFFAFDFDFFF9FBFDFCFF
      FFFFFF3D21B91F029E917FDEFFFFFFFFFCFFFFFBFFFAF5FAFDFDFFFAFBFFFCF9
      FFFDFDFFFFFFFFFFFAFFFFFDFFFFFFFAFFFCFFFDFAFAFEFCFAFEFFFBF8FCFCF9
      FEFEFEFEFCFDF9FFFAFAFFFFFFFFFFFFFFFFFFFFFDFDFEFBFBFAFFFDFBFFFEFE
      FCFDFEFAFFFFFEFFFAFFFFFAFFFFFDFFFDFFFFFBFFFFFAFFFEFFFCFEFEFCFFFD
      FFFCFEFBFBFEFCFBFEFFFCFEF6FAFCFBFBFEFEF9FCFDFAFFFCFDFFFEFFFEFDFE
      FDFAFFFFFBFAFBF9F9FCFBFAFCFEFFFEFCFFFFFDFFFFFCFDFFF7FDFEFDFDFBFF
      FAFEFDFAFCFCFEFCFFF9FCFBFEFFFEFDFEFCF8FFF3FAFFF5FBFDF8FEFBFFFFFB
      FFFFFCFFFFFFFEFEFFFAFEFFFAFBFDFAFBFCFEFDFAFFFFFCFFFFFDFFFEFFFDFC
      FFEDFAFFF6FAFFFEF6FCFFF6FAFFF9FAFFFEFEFFFFFEFBFEFEFA}
  end
  object Edit1: TEdit [16]
    Left = 373
    Top = 62
    Width = 321
    Height = 24
    TabStop = False
    Color = clInfoBk
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = PopupMenu1
    ReadOnly = True
    TabOrder = 10
  end
  inherited DtSrc: TDataSource
    Left = 518
    Top = 205
  end
  object scdsCp_proc: TSQLClientDataSet
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <>
    Left = 447
    Top = 200
    object scdsCp_procCOD_H_IMALU: TIntegerField
      FieldName = 'COD_H_IMALU'
      Required = True
    end
    object scdsCp_procCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
    end
    object scdsCp_procPARCELA: TStringField
      FieldName = 'PARCELA'
      Size = 10
    end
    object scdsCp_procVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
    end
    object scdsCp_procSTATUS: TStringField
      FieldName = 'STATUS'
      Size = 10
    end
    object scdsCp_procTOTAL_ALUGUEL: TFloatField
      FieldName = 'TOTAL_ALUGUEL'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procTOTAL_RECEBIDO: TFloatField
      FieldName = 'TOTAL_RECEBIDO'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procREC_INQUILINO: TStringField
      FieldName = 'REC_INQUILINO'
      Size = 3
    end
    object scdsCp_procDATA_REC: TDateField
      FieldName = 'DATA_REC'
    end
    object scdsCp_procREP_PROPRIETARIO: TStringField
      FieldName = 'REP_PROPRIETARIO'
      Size = 3
    end
    object scdsCp_procDATA_REP: TDateField
      FieldName = 'DATA_REP'
    end
    object scdsCp_procTOTAL_REPASSE: TFloatField
      FieldName = 'TOTAL_REPASSE'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procFORMA_REC: TStringField
      FieldName = 'FORMA_REC'
    end
    object scdsCp_procNDOC_REC: TStringField
      FieldName = 'NDOC_REC'
    end
    object scdsCp_procCAIXA_REC: TStringField
      FieldName = 'CAIXA_REC'
    end
    object scdsCp_procPERIODO_REC: TDateField
      FieldName = 'PERIODO_REC'
    end
    object scdsCp_procPERIODO_REP: TDateField
      FieldName = 'PERIODO_REP'
    end
    object scdsCp_procFORMA_REP: TStringField
      FieldName = 'FORMA_REP'
    end
    object scdsCp_procNDOC_REP: TStringField
      FieldName = 'NDOC_REP'
    end
    object scdsCp_procCAIXA_REP: TStringField
      FieldName = 'CAIXA_REP'
    end
    object scdsCp_procVALOR_A_REC: TFloatField
      FieldName = 'VALOR_A_REC'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procVALOR_A_REP: TFloatField
      FieldName = 'VALOR_A_REP'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procTROCO_REC: TFloatField
      FieldName = 'TROCO_REC'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procTROCO_REP: TFloatField
      FieldName = 'TROCO_REP'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procDESCRICAO_REC: TStringField
      FieldName = 'DESCRICAO_REC'
      Size = 60
    end
    object scdsCp_procDESCRICAO_REP: TStringField
      FieldName = 'DESCRICAO_REP'
      Size = 60
    end
    object scdsCp_procVENCIMENTO_REP: TDateField
      FieldName = 'VENCIMENTO_REP'
    end
    object scdsCp_procCOD_IMALU_1: TIntegerField
      FieldName = 'COD_IMALU_1'
    end
    object scdsCp_procIMOVEL: TStringField
      FieldName = 'IMOVEL'
      Size = 15
    end
    object scdsCp_procTIPO: TStringField
      FieldName = 'TIPO'
    end
    object scdsCp_procCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
    end
    object scdsCp_procCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
    end
    object scdsCp_procCOD_FUNCIONARIO: TIntegerField
      FieldName = 'COD_FUNCIONARIO'
    end
    object scdsCp_procCOD_ENDERECO: TIntegerField
      FieldName = 'COD_ENDERECO'
    end
    object scdsCp_procNR: TStringField
      FieldName = 'NR'
      Size = 5
    end
    object scdsCp_procCOMPL: TStringField
      FieldName = 'COMPL'
      Size = 15
    end
    object scdsCp_procMATRICULA: TStringField
      FieldName = 'MATRICULA'
      Size = 15
    end
    object scdsCp_procDATA_REGISTRO: TDateField
      FieldName = 'DATA_REGISTRO'
    end
    object scdsCp_procDETALHES: TStringField
      FieldName = 'DETALHES'
      Size = 150
    end
    object scdsCp_procVALOR_ALUGUEL: TFloatField
      FieldName = 'VALOR_ALUGUEL'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procVALOR_EXTENCO: TStringField
      FieldName = 'VALOR_EXTENCO'
      Size = 40
    end
    object scdsCp_procALUGADO: TStringField
      FieldName = 'ALUGADO'
      Size = 1
    end
    object scdsCp_procMESES: TStringField
      FieldName = 'MESES'
      Size = 2
    end
    object scdsCp_procDIAPGTO: TStringField
      FieldName = 'DIAPGTO'
      Size = 2
    end
    object scdsCp_procCARENCIA: TStringField
      FieldName = 'CARENCIA'
      Size = 2
    end
    object scdsCp_procDATA_AQUIZICAO: TStringField
      FieldName = 'DATA_AQUIZICAO'
      Size = 10
    end
    object scdsCp_procDATA_LOCACAO: TStringField
      FieldName = 'DATA_LOCACAO'
      Size = 10
    end
    object scdsCp_procDATA_VCONTRATO: TStringField
      FieldName = 'DATA_VCONTRATO'
      Size = 10
    end
    object scdsCp_procN_QUARTOS: TStringField
      FieldName = 'N_QUARTOS'
      Size = 5
    end
    object scdsCp_procN_SALAS: TStringField
      FieldName = 'N_SALAS'
      Size = 5
    end
    object scdsCp_procN_COZINHAS: TStringField
      FieldName = 'N_COZINHAS'
      Size = 5
    end
    object scdsCp_procN_GARAGENS: TStringField
      FieldName = 'N_GARAGENS'
      Size = 5
    end
    object scdsCp_procOBS: TStringField
      FieldName = 'OBS'
      Size = 200
    end
    object scdsCp_procCOMISSAO_IMOBILIARIA: TFloatField
      FieldName = 'COMISSAO_IMOBILIARIA'
    end
    object scdsCp_procCOD_IMOBILIARIA: TStringField
      FieldName = 'COD_IMOBILIARIA'
      Size = 10
    end
    object scdsCp_procCOD_CEP: TIntegerField
      FieldName = 'COD_CEP'
    end
    object scdsCp_procBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 35
    end
    object scdsCp_procCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 30
    end
    object scdsCp_procCEP: TStringField
      FieldName = 'CEP'
      Size = 9
    end
    object scdsCp_procUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object scdsCp_procRUA: TStringField
      FieldName = 'RUA'
      Size = 50
    end
    object scdsCp_procNOME_PROPRIETARIO: TStringField
      FieldName = 'NOME_PROPRIETARIO'
      Size = 60
    end
    object scdsCp_procNOME_INQUILINO: TStringField
      FieldName = 'NOME_INQUILINO'
      Size = 60
    end
    object scdsCp_procNOME: TStringField
      FieldName = 'NOME'
      Size = 50
    end
    object scdsCp_procSTATUS_PRO: TStringField
      FieldName = 'STATUS_PRO'
      Size = 10
    end
    object scdsCp_procPERIODO_REC1: TDateField
      FieldName = 'PERIODO_REC1'
    end
    object scdsCp_procPERIODO_REP1: TDateField
      FieldName = 'PERIODO_REP1'
    end
    object scdsCp_procTOTAL_DESPESAS: TFloatField
      FieldName = 'TOTAL_DESPESAS'
      DisplayFormat = ',#0.00'
    end
    object scdsCp_procTOTAL_RECEITAS: TFloatField
      FieldName = 'TOTAL_RECEITAS'
      DisplayFormat = ',#0.00'
    end
  end
  object DataSource2: TDataSource
    DataSet = scdsCp_proc
    Left = 479
    Top = 200
  end
  object SQLDataSet1: TSQLDataSet
    CommandText = 
      'select VALOR_ALUGUEL '#13#10'from IMOVEL_ALUGUEL '#13#10'where COD_IMALU= :p' +
      'cod'
    MaxBlobSize = 0
    Params = <
      item
        DataType = ftInteger
        Name = 'pcod'
        ParamType = ptInput
      end>
    Left = 424
    Top = 240
    object SQLDataSet1VALOR_ALUGUEL: TFloatField
      FieldName = 'VALOR_ALUGUEL'
    end
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = SQLDataSet1
    Constraints = True
    UpdateMode = upWhereKeyOnly
    Left = 472
    Top = 240
  end
  object cds_muda_aluguel: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'pcod'
        ParamType = ptInput
      end>
    ProviderName = 'DataSetProvider1'
    Left = 520
    Top = 240
    object cds_muda_aluguelVALOR_ALUGUEL: TFloatField
      FieldName = 'VALOR_ALUGUEL'
    end
  end
end
